-- card: 3656 from stack: in
-- bmap block id: 4071
-- flags: 0000
-- background id: 2690
-- name: goCard
----- HyperTalk script -----
global card field "whereItIs"


-- part 1 (field)
-- low flags: 00
-- high flags: 0007
-- rect: left=56 top=133 right=256 bottom=457
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: whereItIs
----- HyperTalk script -----
on openField
  set lockScreen to true
  global x
  if the selectedText <> "" then
    put the selectedText into x
    send findCard
  end if
end openField

on findCard
  global x
  put 0 into loopVariable
  put the number of lines in card field "whereItIs" into loopNumber
  repeat for loopNumber
    add 1 to loopVariable
    if loopVariable = x then
      put item 3 of line loopVariable of card field "whereItIs" into cardTarget
      go to "References"
      go to card cardTarget
    end if
  end repeat
end findCard


-- part 2 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=116 top=68 right=94 bottom=224
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Proceed
----- HyperTalk script -----
on mouseUp
  --go references
  --put the number of last card into tfield
  --repeat for tfield
  --select text of background field 6
  --put selection into it
  --put it into background field 7
  --select text of background field 5
  --put selection into it
  --put empty into background field 5
  --put it into background field 6
  --go next card
  --end repeat
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=275 top=67 right=93 bottom=369
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Test
----- HyperTalk script -----
on mouseUp
  go references
  put the number of last card into tfield
  repeat for tfield
    go next card
  end repeat
end mouseUp



-- part contents for background part 3
----- text -----
3

-- part contents for card part 1
----- text -----
1, 's and Si(1-x)Ge(x) HBT's.,                                  4